AL HAL,HE↔

;COM HLSAIF(37B,XH)/COM↔
;↓
;λ
;SAV HLSAIF↔

;COM HALSAI(37B,XH)/COM↔
;↓
;λ
;SAV HALSAI↔
 
ru hlsaif↔
pass3←pass3↔
↓
λ
do fraid↔
pass3↔
≠≠≠E↔

ru halsai↔
gobble←gobble↔
↓
λ
do fraid↔
gobble↔
≠≠≠E↔

ru halsai↔
wldmod←wldmod↔
↓
λ
do fraid↔
wldmod↔
≠≠≠E↔

ru halsai↔
exprs←exprs↔
↓
λ
do fraid↔
exprs↔
≠≠≠E↔

ru halsai↔
alprin←alprin↔
↓
λ
do fraid↔
alprin↔
≠≠≠E↔

;com emiter(37b,h)/com↔ 
;↓
;λ
;com intdef(37b,h)/com↔
;↓
;λ
;com pmatch(37b,h)/com↔ 
;↓
;λ
;com tcalc(37b,h)/com↔
;↓
;λ
;com arith(37b,h)/com↔ 
;↓
;λ
com halrec(37b,h)/com↔ 
↓
λ
;com armsol.sai(37b,h)/com↔ 
;↓
;λ
;COM ALC(37b,h)/com↔ 
;↓
;λ


R LOADER 160↔
ALC≠
λ
SETUWP↔
SSAVE ALCNEW↔

;COMP HAL/COMP↔